From: Richard M. Stallman <rms@gnu.org>
Date: Fri, 5 Jan 2007 22:54:07 +0000 (+0000)
Subject: (image-type-header-regexps): Recognize xbm more strictly.
X-Git-Tag: archive/raspbian/1%29.2+1-2+rpi1~1^2~2961
X-Git-Url: https://dgit.raspbian.org/%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:///%22http:/www.example.com/cgi/%22https:/www.github.com/%22bookmarks:/?a=commitdiff_plain;h=1a7eef8f212ab7b896eb859d93fd6ed5120f22dd;p=emacs.git

(image-type-header-regexps): Recognize xbm more strictly.
---

diff --git a/lisp/image.el b/lisp/image.el
index e70b9ec539e..a98ca87f728 100644
--- a/lisp/image.el
+++ b/lisp/image.el
@@ -38,7 +38,9 @@
     ("\\`P[1-6][[:space:]]+\\(?:#.*[[:space:]]+\\)*[0-9]+[[:space:]]+[0-9]+" . pbm)
     ("\\`GIF8" . gif)
     ("\\`\x89PNG\r\n\x1a\n" . png)
-    ("\\`[\t\n\r ]*#define" . xbm)
+    ("\\`[\t\n\r ]*#define \\([a-z0-9]+\\)_width [0-9]+\n\
+#define \\1_height [0-9]+\n\
+static char \\1_bits" . xbm)
     ("\\`\\(?:MM\0\\*\\|II\\*\0\\)" . tiff)
     ("\\`[\t\n\r ]*%!PS" . postscript)
     ("\\`\xff\xd8" . (image-jpeg-p . jpeg)))